home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Games of Daze
/
Infomagic - Games of Daze (Summer 1995) (Disc 1 of 2).iso
/
x2ftp
/
msdos
/
lang
/
shwtxt15
/
demo.st
< prev
next >
Wrap
Text File
|
1995-01-31
|
3KB
|
57 lines
' DEMO.ST - Demonstration Program
ON INTKEY0 ESC GOTO QUIT\RIGHT MOUSE ESC\COPY(DEMO,1)
:START\ COPY(1,0)\COLOR 3,4\WINDOW(2,20,21,58)104\CSR(6,23,16,23)
:LOOP\ %R=[R.]\IF (%R&1)=1 GOTO LOOP1\CSR
FOR %B=1 TO 2\BXOR 0 (%R,22,%R,56) 8\WAIT .09\NEXT %B\GOTO LOOP2
:LOOP1\ CSR
:LOOP2\ WAITKEY 0,LOOP\CSR OFF\BFILL 0 (6,22,16,56)32 31\COLOR 15,1
IF KEY A ANMT \IF KEY B BATCH\IF KEY D DEMO
IF KEY G GAME \IF KEY T TUTOR\IF KEY R REG
IF CLK(6,22,6,56)ANMT \IF CLK(8,22,8,56)BATCH
IF CLK(10,22,10,56)DEMO \IF CLK(12,22,12,56)GAME
IF CLK(14,22,14,56)TUTOR\IF CLK(16,22,16,56)REG
GOTO START
:ANMT\ P@ 7,22\!"The ShowText system offers limited"
P@ 8,22\!"animation effects by continually"
P@ 9,22\!"copying preloaded screen files and"
P@10,22\!"internal buffers to the screen. A"
P@11,22\!"portion of a buffer may be copied"
P@12,22\!"to the screen with the BCOPY"
P@13,22\!"command etc."
GOTO ANYKEY
:BATCH\ P@ 6,22\!"The ShowText system will allow the"
P@ 7,22\!"user to build fairly complex batch"
P@ 8,22\!"file systems. This is accomplished"
P@ 9,22\!"by using the IF ERRORLEVEL batch"
P@10,22\!"statement. Upon exiting your"
P@11,22\!"compiled EXE program, the batch"
P@12,22\!"file can use the IF ERRORLEVEL"
P@13,22\!"command to determine if it should"
P@14,22\!"GOTO a batch file label."
GOTO ANYKEY
:DEMO\ P@ 7,22\!"The ShowText system can be used to"
P@ 8,22\!"develop some fairly complex DEMO"
P@ 9,22\!"and/or game programs."
GOTO ANYKEY
:GAME\ P@ 7,22\!"It is possible to use the ShowText"
P@ 8,22\!"system to design ASCII text based"
P@ 9,22\!"games. Try out the games which are"
P@10,22\!"included: GUESS, PUZZLE, MATCH,"
P@11,22\!"MMIND and REPEAT."
GOTO ANYKEY
:TUTOR\ P@ 7,22\!"The ShowText system can be used to"
P@ 8,22\!"design interactive tutorials. The"
P@ 9,22\!"user can select answers to multiple"
P@10,22\!"choice questions by using the mouse"
P@11,22\!"or keyboard."
GOTO ANYKEY
:REG\ P@ 7,22\!"The REGISTERED copy of ShowText"
P@ 8,22\!"will not generate the initial"
P@ 9,22\!"UNREGISTERED version banner."
P@13,22\!"A text screen capture program is"
P@14,22\!"included in the REGISTERED version."
:ANYKEY\COLOR 15,1\P@16,26\!!"Press any key to continue"
WAITKEY\CSR\GOTO START
:QUIT\ EXITC